﻿Public Class CompteFrom
    Public Id_Compte As Integer
    Public Id_Form As Integer
    Public isRead As Boolean

    Public Sub New()

    End Sub

    Public Sub New(ByVal Id_Compte As Integer, ByVal Id_Form As Integer, ByVal isRead As Boolean)
        With Me
            .Id_Compte = Id_Compte
            .Id_Form = Id_Form
            .isRead = isRead
        End With
    End Sub
End Class
